home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / Ap-Az / Appletalk Lookup.cpt / AppleTalk Lookup / card_3276.txt < prev    next >
Text File  |  1987-11-24  |  2KB  |  117 lines
  1. -- card: 3276 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2691
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on opencard
  8.   put empty into card field "status"
  9. end opencard
  10.  
  11.  
  12.  
  13. -- part 2 (field)
  14. -- low flags: 00
  15. -- high flags: 0004
  16. -- rect: left=332 top=37 right=58 bottom=511
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 0 / 0
  19. -- text alignment: 0
  20. -- font id: 3
  21. -- text size: 12
  22. -- style flags: 0
  23. -- line height: 16
  24. -- part name: object
  25.  
  26.  
  27. -- part 3 (field)
  28. -- low flags: 00
  29. -- high flags: 0004
  30. -- rect: left=332 top=59 right=80 bottom=511
  31. -- title width / last selected line: 0
  32. -- icon id / first selected line: 0 / 0
  33. -- text alignment: 0
  34. -- font id: 3
  35. -- text size: 12
  36. -- style flags: 0
  37. -- line height: 16
  38. -- part name: type
  39.  
  40.  
  41. -- part 4 (field)
  42. -- low flags: 00
  43. -- high flags: 0004
  44. -- rect: left=332 top=81 right=101 bottom=511
  45. -- title width / last selected line: 0
  46. -- icon id / first selected line: 0 / 0
  47. -- text alignment: 0
  48. -- font id: 3
  49. -- text size: 12
  50. -- style flags: 0
  51. -- line height: 16
  52. -- part name: zone
  53.  
  54.  
  55. -- part 5 (button)
  56. -- low flags: 00
  57. -- high flags: 8004
  58. -- rect: left=367 top=8 right=32 bottom=476
  59. -- title width / last selected line: 0
  60. -- icon id / first selected line: 0 / 0
  61. -- text alignment: 1
  62. -- font id: 0
  63. -- text size: 12
  64. -- style flags: 0
  65. -- line height: 16
  66. -- part name: Register
  67. ----- HyperTalk script -----
  68. on mouseDown
  69.   put Register( first line of card field object, first line of card field type, first line of card field zone) into card field "status"
  70. end mouseDown
  71.  
  72.  
  73.  
  74. -- part 6 (field)
  75. -- low flags: 00
  76. -- high flags: 0004
  77. -- rect: left=144 top=37 right=101 bottom=331
  78. -- title width / last selected line: 0
  79. -- icon id / first selected line: 0 / 0
  80. -- text alignment: 0
  81. -- font id: 3
  82. -- text size: 12
  83. -- style flags: 0
  84. -- line height: 16
  85. -- part name: status
  86.  
  87.  
  88. -- part 7 (button)
  89. -- low flags: 00
  90. -- high flags: 8004
  91. -- rect: left=369 top=106 right=130 bottom=478
  92. -- title width / last selected line: 0
  93. -- icon id / first selected line: 0 / 0
  94. -- text alignment: 1
  95. -- font id: 0
  96. -- text size: 12
  97. -- style flags: 0
  98. -- line height: 16
  99. -- part name: Remove
  100. ----- HyperTalk script -----
  101. on mouseDown
  102.   put Remove( first line of card field object, first line of card field type, first line of card field zone) into card field "status"
  103. end mouseDown
  104.  
  105.  
  106.  
  107. -- part contents for card part 2
  108. ----- text -----
  109. Gert
  110.  
  111. -- part contents for card part 3
  112. ----- text -----
  113. HyperCard
  114.  
  115. -- part contents for card part 4
  116. ----- text -----
  117. *